home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / dlaset.z / dlaset
Text File  |  1996-03-14  |  2KB  |  67 lines
  1.  
  2.  
  3.  
  4. DDDDLLLLAAAASSSSEEEETTTT((((3333FFFF))))                                                          DDDDLLLLAAAASSSSEEEETTTT((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      DLASET - initialize an m-by-n matrix A to BETA on the diagonal and ALPHA
  10.      on the offdiagonals
  11.  
  12. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  13.      SUBROUTINE DLASET( UPLO, M, N, ALPHA, BETA, A, LDA )
  14.  
  15.          CHARACTER      UPLO
  16.  
  17.          INTEGER        LDA, M, N
  18.  
  19.          DOUBLE         PRECISION ALPHA, BETA
  20.  
  21.          DOUBLE         PRECISION A( LDA, * )
  22.  
  23. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  24.      DLASET initializes an m-by-n matrix A to BETA on the diagonal and ALPHA
  25.      on the offdiagonals.
  26.  
  27.  
  28. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  29.      UPLO    (input) CHARACTER*1
  30.              Specifies the part of the matrix A to be set.  = 'U':      Upper
  31.              triangular part is set; the strictly lower triangular part of A
  32.              is not changed.  = 'L':      Lower triangular part is set; the
  33.              strictly upper triangular part of A is not changed.  Otherwise:
  34.              All of the matrix A is set.
  35.  
  36.      M       (input) INTEGER
  37.              The number of rows of the matrix A.  M >= 0.
  38.  
  39.      N       (input) INTEGER
  40.              The number of columns of the matrix A.  N >= 0.
  41.  
  42.      ALPHA   (input) DOUBLE PRECISION
  43.              The constant to which the offdiagonal elements are to be set.
  44.  
  45.      BETA    (input) DOUBLE PRECISION
  46.              The constant to which the diagonal elements are to be set.
  47.  
  48.      A       (input/output) DOUBLE PRECISION array, dimension (LDA,N)
  49.              On exit, the leading m-by-n submatrix of A is set as follows:
  50.  
  51.              if UPLO = 'U', A(i,j) = ALPHA, 1<=i<=j-1, 1<=j<=n, if UPLO = 'L',
  52.              A(i,j) = ALPHA, j+1<=i<=m, 1<=j<=n, otherwise,     A(i,j) =
  53.              ALPHA, 1<=i<=m, 1<=j<=n, i.ne.j,
  54.  
  55.              and, for all UPLO, A(i,i) = BETA, 1<=i<=min(m,n).
  56.  
  57.      LDA     (input) INTEGER
  58.              The leading dimension of the array A.  LDA >= max(1,M).
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.